
I Functions 




Argument ranges are indicated below by special letters: 

x: ( 1 x10E38, -1 ■ 10 E -38),(1 ■ 10 E 38.1 ■ 10E38) 

c: (0.255) 

n: (-32768, 32767) 

str: string argument 

var: variable name 

ABS(x) Computes absolute value. 

Y = ABS(X) 

ASC(str) Returns ASCII code of first character of string. 

A = ASC(TS) 

ATN(x) Computes arctangent: value returned in radians. 

Y = ATN(X 3) 

CDBL(x) Converts to double-precision. 

X# = CDBL(N*3) 

CHR$(c) Returns character for ASCII, control, or graphics 

code. 
P$ CHRS(T) 

CINT(n) Returns largest integer not greater than n. 

PRINT CINT (15.0075) 

COS(jt) Computes cosine: angle must be in radians. 

Y - COS(X) 

CSNG(x) Converts to single-precision. 

FC = CSNG(TM# 



ERL Returns the line number in which an error has 

occurred. 

PRINT ERL 

ERR If an error occurs, returns a value related to the error 

code: value returned - (error code 1)*2. 
IF ERR = 12 THEN 650 ELSE 800 

EXP(jt) Computes natural antilog. 

Y = EXP(X) 

FIX(x) Truncates all digits to right of decimal point. 

Y = FIX(X) 



FRE( numeric) 

F - FRE(X) 



Finds amount of free memory. 
PRINT FRE(10) 



FRE(*tr) Returns amount of unused string space, str is any 

string constant or string variable. 
FRE("C ') FRE(CS) 



INKEYS Gets keyboard character if available. 

AS = INKEYS 

INP(p) Gets value from specified port, p = 0-255. 

V = INP(255) 



INT(jr) Returns largest whole number not greater than x. 

Y = INT(X) 

LEFT$(sfr, c) Returns left portion of string. 

PS-LEFT$(M$, 7) 

LEN(stfr) Returns the number of characters in a string. 

X = LEN(SENS) 

LOG(x) Computes natural logarithm. 

Y - L0G(X) 

MEM Finds amount of free memory. 

PRINT MEM 

MlD$(string 9 pos, ten) Returns a substring of another 

string. If length option is omitted, the entire string right of pos is 
returned. 
PRINT MIDSIAS. 3. 2) FS-MIDSIAS. 3) 

PEEK(n) Gets value in location n (n to end of memory). 

V=PEEK( 18520 



POINT(x, y) Tests whether specified graphics block is on 

or off. x (horizontal) 127; y (vertical) 47. 
F POINT (13.35) THEN PRINT "ON" ELSE PRINT "OFF" 



POS(jt) Returns column position of cursor (0 - 63). x is a 

dummy argument. 
PRINT TABI40) P0S(0) 

RIGHTS (sir, c) Returns right portion of string. 

ZIPS RIGHTSIADS. 5) 

RND(n) Generates a "random" number between 1 and n if 

n > 1 , or between and 1 if n = 0. 

Y = RNDI100) PRINT RND(O) R = RND(X) 

SGN(x) Returns sign component; - 1 , 0, 1 , if x is negative. 

zero, positive. 
X = SGN(A*B) 

SIN(x) Computes sine; angle must be in radians. 

Y = SIN(X) 

SQR(x) Computes square root. 

Y = SQR(A * B 



STR$(jt) Converts a numeric expression to a string 

SS STRSIX 




STRINGS (/, c) Returns string of characters of length I. 

Character c can be specified as an ASCII code or as a string. 
B$ - STRINGS (125. "?") BS = STRINGS(125. 63) 

TAN(jr) Computes tangent: angle must be in radians. 

Y - TAN(X) 

TIME$ Returns the time (in 24-hour format) and the date as 

a 17-character string. 
AS = TIMES 

USR(jt) Calls a machine-language subroutine whose 

address is stored at 16526 16527. 
PRINT USR( 1) X - USR(Y) 

VAL(*£r) Evaluates a string as a number. 

V% - VALC'100 DOLLARS'") 

VARPTR( var) Gets address where variable contents are 

stored. 

Y = USR (VARPTR (X)) 




Error Messages 




Code 


Abbreviation 


Explanation 


1 


NF 


NEXT Without FOR 


2 


SN 


Syntax error 


3 


RG 


RETURN Without GOSUB 


4 


OD 


Out of data 


5 


FC 


Illegal function call 


6 


OV 


Overflow 


7 


OM 


Out of memory 


8 


UL 


Undefined line 


9 


BS 


Subscript out of range 


10 


DD 


Redimensioned array 


11 


/0 


Division by zero 


12 


ID 


Illegal direct 


13 


TM 


Type mismatch 


14 


OS 


Out of string space 


15 


LS 


String too long 


16 


ST 


String formula too complex 


17 


CN 


Can't continue 


18 


NR 


No RESUME 


19 


RW 


RESUME without error 


20 


UE 


Undefined error 


21 


MO 


Missing operand 


22 


FD 


Bad file data 


23 


L3 


Disk BASIC feature 




POKE Addresses 



By POKEing various values into the addresses listed 
below, you can activate or control many of the Model 
Ill's special features. See the Owner's Manual for 
details. 

Sample Use 

To select the High cassette rate, execute: 
POKE 16913, 1 




Address 




Initial 


Dec 


Hex 


Contents 


Contents 


16409 


4019 


Caps Lock Switch 

"Upper and Lower Case" 

Not "Caps Only" 


• Caps' 


16412 


401 C 


Cursor Blink Switch 

, "Blink" 

Non-Zero ■ No-Blink" 





16416 


4020 


Cursor Address 
Two bytes: LSB, MSB 


N A 


16419 


4023 


Cursor Character 
ASCII Code - 255 


176 


16424 


4028 


Maximum Lines Page 
plus one 


67 


16425 


4029 


Number of lines printed 
plus one 


1 


16427 


402B 


Line Printer Max. Line 

length less two. 

255 "No Maximum" 


255 


16526 


408E 


Address of USR Routine 
Two Bytes: LSB, MSB 


7754 



16872 41 E8 



16880 41 F0 



SRSRCV Input Buffer 
One byte 

SRSTX Output Buffer 
One byte 










16888 41 F8 



16889 41 F9 



16890 41 FA 



169*3 4211 



16916 4214 



SRSINIT Baud Rate Code 
TX Code = Most Sig. Nibble 
RCV Code - Least Sig Nibole 

SRSINIT Parity Word Length 
Stop-Bit Code 

SRSINIT Wait Switch 
- "Don't Wait' 
Non-Zero "Wait" 

Cassette Baud Rate Switch 
500 Baud 
Non-Zero 1500 Baud 

Video Disp'ay Scroi Protect 
F r om to 7. Greater values 
are interpreted in moaulo 8 



85 



08 



Wait 



N A 







16919 4217 



Time-Date 

Six binary bytes: 

SS MM HH YY 







DD MM 



1 6928 4220 



1 6930 4222 



SRCUTE Destination Device 
Two-byte I O designator 

SROUTE Source Device 
Two-byte I O designator 



N A 






NA 





Z-80 ROM Subroutines 



1 



The following ROM subroutines may be used by z-80 
programs; some may also be used by basic programs 
via the usr function. Before trying to use any of 
these, read the Technical Information Section of 
your Owner's Manual. 




Address 






Dec 


Hex 


Contents 


Function 





0000 


SRESET 


System reset 


43 


002 B 


SKBCHAR 


Check 'c keyboard character 


51 


0033 


SVDCHAR 


Display a character 


59 


003B 


SPRCHAR 


Print a character 


64 


0040 


SKBLINE 


Wait for a keyboard line 


73 


0049 


SKBWAIT 


Wait for a keyboard character 


80 


0050 


SRSRCV 


Receive character from RS-232-C 


85 


0055 


SRSTX 


Transmit character to RS-232-C 


90 


005A 


SRSINIT 


Initialize RS-232-C 


96 


0060 


SDELAY 


Delay ?o r a specified time 


105 


0069 


SINITIO 


Initialize all I O drivers 


108 


006C 


SROUTE 


Route I O 


457 


01C9 


SVDCLS 


Clear the screen 


473 


01 D9 


SPRSCN 


Print screen contents 


539 


021 B 


SVDLINE 


Display a line 


565 


0235 


SCSIN 


Input a cassette byte 


612 


0264 


SCSOUT 


Output a cassette byte 


647 


0287 


SCSHWR 


Write the cassette header 


653 


028D 


SKBBRK 


Check for BREAK key only 


662 


0296 


SCSHIN 


Read the cassette header 


664 


0298 


SCLKON 


Turn or the clock display 


673 


02 A 1 


SCKLOFF 


Turn off the clock disolay 


668 1 


1A19 


SREADY 


Jump to BASIC READY 


1 2339 3033 


SDATE 


Get the ciate 


1 2342 3036 


STIME 


Get the time 


1 2354 3042 


SSETCAS 


Set cassette baua rate 


14312 37E8 


SPRSTAT 


Pinter status 








(Read Only) 








"Go' only if: 








Bit 7 "NOT BUSY" 








Bit 6 "NOT OUT OF PAPER" 








Bit 5 1 "DEVICE SELECT" 








Bit 4 1 "NOT PRINTER FAULT" 




Bits 3.2,1 and are not used. 






nrDrT] 



jc 



adJ 





TRS-80 M 
MODEL III 
MICRO- 
COMPUTER 
SYSTEM 



Start-Up 




The entire system (Computer and peripherals) should 
be off. 

1 . Turn on all peripherals, then turn on the Computer. 

peripherals. 

2. The message: 

Cass? 
should be displayed. To select the High cassette 
speed (1 500 baud), press 30 or fENTERj. To select 
the Low cassette speed (500 baud), press CD- 

For general purposes, use High. To load or save 
Model I Level II basic programs, you must use 
Low. 

3. The message: 

Memory Size? 
will be displayed. To use all available memory, 
press CENTER) . To reserve some high memory, type 
in the highest address (in decimal) that you want to 
use, then press CENTER). 

4. The message: 

Model III Basic 

(c) Tandy '80 

READY 

> 
will be displayed. The Computer is now ready to 
use. 




The biggest name in little computers™ 
® Cokyright 1980 by Radio Shack, A Division of Tandy Corporation 



( 







Statements 



AUTO start, increment 

AUTO AUTO 150. 20 



Numbers lines automatically. 
AUTO 5 



CLEARn Reserves n bytes of string storage space: 

initializes all variables. 
CLEAR CLEAR 75 CLEAR 

CLOAD Loads BASIC program file from cassette. Only the 

first character of the file name is used. 
CLOAD CLOAD ' MIXIT" 

CLOAD? Compares program on tape byte-for-byte with 

resident program. 
CLOAD? CLOAD? MIXIT" 



CLS 

CLS 



Clears the display. 



CONT Continues execution of program after BREAK or 

STOP. 

CONT 

CSAVE Stores resident program on cassette tape. A file 

name is required Only the first character of the file name is 
used. 
CSAVE MIXIT' 

DATA Stores data to be accessed by a READ statement 

DATA "LINCOLN A. 1861. ILLINOIS 

DEFDBL Defines variables as double-precision. 

DEFDBL V. X-Z 

DEFINT Defines variables as integer type. 

DEFINT A, l-N 

DEFSNG Defines variables as single-precision 

DEFSNG I, W-Z 

DEFSTR Defines variables as string type 

DEFSTR C. L-Z 

DELETE Erases program lines from memory. 

DELETE 1205 DELETE -80 DELETE 

DIM Dimensions one or more arrays. 

DIM R(75). W(40) DIM ARS(8. 25) 

DIM L%(3, 18. 5) 

EDIT Puts computer into edit mode for specified line. See 

Edit Commands. 

EDIT 100 EDIT 




END Ends program execution. 

END 



ERROR(n) 

ERRORM) 



Simulates the specified error, n 1 23. 



FOR...TO...STEP NEXT 

FOR I = 1 TO 8 (...) NEXT 

FORC =0 TO 5 STEP 2 (...) NEXT C! 



Opens program loop. 



GOSUB Transfers program control to the specifier 

subroutine. 
GOSUB 750 

GOTO Transfers program control to the specified line 

GOTO 180 

IF. ..THEN. ..ELSE Tests conditional expression. 

IF P = Q THEN 200 
IF N% ■ 0THEN 150 ELSE N°c - N% 1 

INPUT Inputs data from Keyboard. 

INPUT X# INPUT L. M. N INPUT' NEXT ';N 

INPUT # - 1 Inputs data from cassette. 

INPUT #-1. A 

LET Assigns value to variable (optional). 

LETX 7.05 LET R2 = R1 LET CS RED 

LIST Lists program lines to the video display 

LIST LIST 50-85 

LLIST Lists program lines to the line pn'nter. 

LLIST LLIST 50 

LPRINT Prints an item or list of items on the printer. 

LPRINT CAPS, IS THE CAPITAL OF" STS 

LPRINT TAB Moves printer carriage to specified position 

LPRINT TAB(25l NAME" 

LPRINT USING Prints formatted numbers and strings on 

the printer. See print using for list of field specifiers. 
LPRINT USING ####."; 1234 

NEW Erases proqram from memory; initializes all variables 

NEW 



ON ERROR GOTO 

ON ERROR GOTO 2100 

ON ERROR GOTO O 

ON ERROR GOTO 



Sets up an error-handling routine 



Disables an error-handling routine 






i 



ON. .-GOSUB Multi-way branch to specified subroutines. 

ON Y GOSUB 50. <00 150. POO 

ON. ..GOTO Multi-way branch to specified lines. 

ON XGOTO 190. 200. 210 

OUTp, v Sends value to specified port, p and v - 255. 

OUT 255, 

POKE a, v Puts value v (0 - 255) into location n (1 5360 to 

end of memory). See POKE Addresses. 

POKE 15872. 255 

PRINT Prints an item or list of items on the display at 

current cursor position. 
PRINT X! t Y! PRINT USA." 

PRINT an Prints beginning at n. n - 0- 1023 

PRIM m 477 CENTER ' 

PRINT# - 1 Writes data to cassette 

PRINT #-1. A 

PRINT TAB Moves cursor right to specified tao position 

PRINT TAB(20> NAME" 

PRINT USING Formats strings and numoers 

# Formats numbers. 

PRINT USING #####"; 66.2 

Decimal point. 
PRINT USING ##.# ;58 76 

Displays comma to left of every third aigit. 
PRINT USING ####."; ^234 
** Fills leading spaces with asterisks. 

PRINT USING **#### 44.0 
$$ Floating dollar sign. 

PRINT USING "$$##.##"; 118.6735 
**$ Floatinq dollar sign: fills leading soaces with asterisks. 
PRINT USING **$#.*# . 8.333 

Exponential format. Press It to generate this character. 
PRINT USING "###.# [[[[' ; 8527100 

In first position, causes sign to be printed; in last position, 
causes sign to oe printed after the number. 
PRINT USING ' • ###": 216 

Minus sign after negative numbers, space after positive 
PRINT USING "####.# "; 8124.420 

Returns first string character. 
PRINT USING l T: "YELLOW" 
%spaces% String field: length of field is number of spaces 
plus 2. 
PRINT USING "% %"; "BLUE" 



[ 



I 




RANDOM 

RANDOM 

READ 

READT 



Reseeds random number generator. 

Reads value(s) from a data statement. 
READ SS READ NMS. AGE 



REM Remark; instructs computer to ignore rest o f line, is 

an abbreviation for REM. 

REM PLACE COMMENTS HERE ' HERE TOO 

RESET (jr, y) Turns off graphics biock at specified location, 

x (horizontal) = 0- 127; y(vertical) 47. 
RESET (21 40) RESET (L\ L2) 




RESTORE 

RESTORE 



Resets data pointer to first item in first aata line 






RESUME Ends an error-handling routine by specifying 

where normal execution is to resume. 
RESUME RESUME 40 RESUME NEXT 



RETURN 

GOSUB. 
RETURN 



Returns from subroutine to next statement after 



RUN Executes resident program or portion of it. 

RUN RUN 150 

SET (m, y) Turns on graphics block at specified 'ocation. x 

(horizontal) - 127; y (vertical) - 0-47. 
SET (10. 0) SET (L1, L2 



STOP Stops execution of a program. 

STOP 

SYSTEM Puts compute*" in monitor mode, allows loacing of 

object files. In response to '?. type filename or address. 
SYSTEM 

TROFF Turns off the trace. 

TROFF 

TRON Turns on the trace. 

TR0N 



Video Control Codes 



Dec 


Hex 


8 


08 


10 


OA 


13 


OD 


14 


OE 


15 


OF 


21 


15 


22 


16 


23 


17 


24 


18 


25 


19 


26 


1A 


27 


1B 


28 


1C 


29 


1D 


30 


1E 


31 


1F 



PRINT CHRS (code) 

Backspaces and erases current character 

Line feed with carriage return. 

Line feed with carriage return. 

Turns on cursor. 

Turns off cursor. 

Switches special compression characters. 

Switches alternate characters. 

Shifts to 32-character mode. 

Backspaces cursor without erasing. 

Advances cursor. 

Downward line feed. 

Upward line feed. 

Homes cursor. 

Moves cursor to beginning of line 

Erases to end of line. 

Clears to end of screen. 




Operators 



Each operator or group of operators is precedent over the g r oup 
oelow it. 



I or [ 



-, + 

+ , - 



» » 






Exponentiation (returns single-precision 

Press ffj to generate this operator; 

it will be displayed as a left 

bracket 7" 

Unary negative, positive 

Multiplication, division 

Addition and concatenation, subtraction 

Relational tests 



NOT 
AND 
OR 






ili 
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Special Characters 



AbDreviation for :REM 

Makes variable integer-precision. 

Makes variable single-precision. 

Makes variable double-precision. 

Makes variable string type. 

Separates statements on the same line. 

Same as PRINT (but L? cant be substituted for LPRINT) 

PRINT punctuation: spaces over 
to the next 16-column PRINT zone. 

PRINT punctuation: separates items in a 

PRINT list but does not add spaces when they are 

output. 




Edit Commands 




« IT 



CK 



»_K C 

CD 

n(T c 

X 

SHIFT CD 

ENTER 

nSHCEBffi 



Cancels changes and starts again. 

Changes n characters. 

Deletes n characters. 

Ends editing and saves all changes. 

Hacks line and inserts at end. 

Inserts characters. 

Kills all characters up to nth occurrence of c. 

Lists the line. 

Quits edit mode and cancels all changes. 

Searches for nth occurrence of c. 

Extends line (inserts at end) 

Causes escape from command. 

Records all changes and exits edit mode. 

Moves cursor n spaces to the right. 

Moves cursor n spaces to the left. 







Control Keys 



(M 



SHIFT .'3 



BREAK 


CLEAR 


INTER 


SPACEBAR 


© 


SHIFT © 


® 


SHIFT I 


SHIFTi®© 


SHIFT <«< 




Cancels last character 

typed; moves cursor back one space. 

Erases current line. 

Interrupts anything in progress and 
returns to command level. 

Clears the screen. 

Signifies end of current line 

Enters a space (blank) character and 
moves cursor one space forward. 

Advances cursor to next tab position. 

Puts display in 32-character mode. 

Line feed and carriage return 

'"Control" key— hold down these 

two and press any key A-Z for control A 

control Z. 

Copies the display contents to the 
printer. 

Causes currently executing program to 
pause (press any key to continue). 




PRINTED IN U.S.A. 
8759038-780-SL 



